<?php

namespace App\Helpers;

class StrCipher {
    private static $password = 'yn_xunlu_187188150'; //项目上线后 密码不能修改

    /**
     * 说明：字符串加密
     *
     * @param type
     *
     * @return
     * @author  daixinguo (daixinguo57@163.com)
     */
    public static function encode($data, $key = '') {
        $data = (string)$data;
        $key = !empty($key) ? $key : self::$password;
        $md5_key = md5($key);
        $x = 0;
        $len = strlen($data);
        $key_len = strlen($md5_key);
        $char = '';
        for ($i = 0; $i < $len; $i++) {
            if ($x == $key_len) {
                $x = 0;
            }
            $char .= $md5_key[$x];
            $x++;
        }
        $str = '';
        for ($i = 0; $i < $len; $i++) {
            $str .= chr(ord($data[$i]) + (ord($char[$i])) % 256);
        }
        $str = base64_encode($str);
        //对密文进行二次处理 打乱密文的规律【连续的数字编码加密密文呈现规律性】
        $last_code = substr($data, -1);
        if (is_numeric($last_code)) {
            $key_a = strlen($key) * $last_code * $last_code;
            //打乱顺序的算法  根据 $key_a 将其分离成为单个数字  然后根据这些单个的数字  遇到0时顺序不变  遇到 1 时 密文的第一位和倒数第一位交换位置  遇到 2 时 第二位和倒数第二位交换
            $key_a = trim(chunk_split($key_a, 1, '.'), '.');
            $key_a_arr = explode('.', $key_a);
            foreach ($key_a_arr as $value) {
                if ($value) {
                    $a = $str[$value - 1];
                    $str[$value - 1] = $str[strlen($str) - $value];
                    $str[strlen($str) - $value] = $a;
                }
            }
            $str .= $last_code;
        }
        return $str;
    }

    /**
     * 说明：字符串解密
     *
     * @param type
     *
     * @return
     * @author  daixinguo (daixinguo57@163.com)
     */
    public static function decode($data, $key = '') {
        $data = (string)$data;
        $key = !empty($key) ? $key : self::$password;
        //对密文进行顺序复原 加密时打乱密文的规律【连续的数字编码加密密文呈现规律性】
        $last_code = substr($data, -1);
        if (is_numeric($last_code)) {
            $key_a = strlen($key) * $last_code * $last_code;
            //打乱顺序的算法  根据 $key_a 将其分离成为单个数字  然后根据这些单个的数字  遇到0时顺序不变  遇到 1 时 密文的第一位和倒数第一位交换位置  遇到 2 时 第二位和倒数第二位交换
            $key_a = trim(chunk_split($key_a, 1, '.'), '.');
            $data = trim($data, $last_code);
            $key_a_arr = explode('.', $key_a);
            foreach ($key_a_arr as $value) {
                if ($value) {
                    $a = $data[$value - 1];
                    $data[$value - 1] = $data[strlen($data) - $value];
                    $data[strlen($data) - $value] = $a;
                }
            }
        }
        $key = md5($key);
        $x = 0;
        $de_data = base64_decode($data);
        $len = strlen($de_data);
        $key_len = strlen($key);
        $char = '';
        for ($i = 0; $i < $len; $i++) {
            if ($x == $key_len) {
                $x = 0;
            }
            $char .= substr($key, $x, 1);
            $x++;
        }
        $str = '';
        for ($i = 0; $i < $len; $i++) {
            if (ord(substr($de_data, $i, 1)) < ord(substr($char, $i, 1))) {
                $str .= chr((ord(substr($de_data, $i, 1)) + 256) - ord(substr($char, $i, 1)));
            } else {
                $str .= chr(ord(substr($de_data, $i, 1)) - ord(substr($char, $i, 1)));
            }
        }
        return $str;
    }

    /**
     * 说明：加密字符串  密文过长  同一个字符串 多次加密 密文不一致
     *
     * @param type
     *
     * @return
     * @author  daixinguo (daixinguo57@163.com)
     */
    public static function authcode($string, $operation = 'decode', $key = '', $expiry = 0) {
        // 动态密匙长度，相同的明文会生成不同密文就是依靠动态密匙
        $ckey_length = 4;

        // 密匙
        $key = md5($key ? $key : self::$password);

        // 密匙a会参与加解密
        $keya = md5(substr($key, 0, 16));
        // 密匙b会用来做数据完整性验证
        $keyb = md5(substr($key, 16, 16));
        // 密匙c用于变化生成的密文
        $keyc = $ckey_length ? ($operation == 'decode' ? substr($string, 0, $ckey_length) : substr(md5(microtime()), -$ckey_length)) : '';
        // 参与运算的密匙
        $cryptkey = $keya . md5($keya . $keyc);
        $key_length = strlen($cryptkey);
        // 明文，前10位用来保存时间戳，解密时验证数据有效性，10到26位用来保存$keyb(密匙b)，
        //解密时会通过这个密匙验证数据完整性
        // 如果是解码的话，会从第$ckey_length位开始，因为密文前$ckey_length位保存 动态密匙，以保证解密正确
        $string = $operation == 'decode' ? base64_decode(substr($string, $ckey_length)) : sprintf('%010d', $expiry ? $expiry + time() : 0) . substr(md5($string . $keyb), 0, 16) . $string;
        $string_length = strlen($string);
        $result = '';
        $box = range(0, 255);
        $rndkey = [];
        // 产生密匙簿
        for ($i = 0; $i <= 255; $i++) {
            $rndkey[$i] = ord($cryptkey[$i % $key_length]);
        }
        // 用固定的算法，打乱密匙簿，增加随机性，好像很复杂，实际上对并不会增加密文的强度
        for ($j = $i = 0; $i < 256; $i++) {
            $j = ($j + $box[$i] + $rndkey[$i]) % 256;
            $tmp = $box[$i];
            $box[$i] = $box[$j];
            $box[$j] = $tmp;
        }
        // 核心加解密部分
        for ($a = $j = $i = 0; $i < $string_length; $i++) {
            $a = ($a + 1) % 256;
            $j = ($j + $box[$a]) % 256;
            $tmp = $box[$a];
            $box[$a] = $box[$j];
            $box[$j] = $tmp;
            // 从密匙簿得出密匙进行异或，再转成字符
            $result .= chr(ord($string[$i]) ^ ($box[($box[$a] + $box[$j]) % 256]));
        }
        if ($operation == 'decode') {
            // 验证数据有效性，请看未加密明文的格式
            if ((substr($result, 0, 10) == 0 || substr($result, 0, 10) - time() > 0) && substr($result, 10, 16) == substr(md5(substr($result, 26) . $keyb), 0, 16)) {
                return substr($result, 26);
            } else {
                return '';
            }
        } else {
            // 把动态密匙保存在密文里，这也是为什么同样的明文，生产不同密文后能解密的原因
            // 因为加密后的密文可能是一些特殊字符，复制过程可能会丢失，所以用base64编码
            return $keyc . str_replace('=', '', base64_encode($result));
        }
    }

    /**
     * 说明：加密字符串  密文较短
     *
     * @param type
     *
     * @return
     * @author  daixinguo (daixinguo57@163.com)
     */
    public function cipherCode($string, $operation = 'decode', $key = '') {
        $key = $key ? $key : self::$password;
        $key = md5($key);
        $key_length = strlen($key);
        $string = $operation == 'decode' ? base64_decode($string) : substr(md5($string . $key), 0, 1) . $string;
        $string_length = strlen($string);
        $rndkey = $box = [];
        $result = '';
        for ($i = 0; $i <= 255; $i++) {
            $rndkey[$i] = ord($key[$i % $key_length]);
            $box[$i] = $i;
        }
        for ($j = $i = 0; $i < 256; $i++) {
            $j = ($j + $box[$i] + $rndkey[$i]) % 256;
            $tmp = $box[$i];
            $box[$i] = $box[$j];
            $box[$j] = $tmp;
        }
        for ($a = $j = $i = 0; $i < $string_length; $i++) {
            $a = ($a + 1) % 256;
            $j = ($j + $box[$a]) % 256;
            $tmp = $box[$a];
            $box[$a] = $box[$j];
            $box[$j] = $tmp;
            $result .= chr(ord($string[$i]) ^ ($box[($box[$a] + $box[$j]) % 256]));
        }
        if ($operation == 'decode') {
            if (substr($result, 0, 1) == substr(md5(substr($result, 1) . $key), 0, 1)) {
                return substr($result, 1);
            } else {
                return '';
            }
        } else {
            return str_replace('=', '', base64_encode($result));
        }
    }
}
